source("tokens.R", local = TRUE)
source("class.R", local = TRUE)
source("dictionary.R", local = TRUE)
source("fulltext.R", local = TRUE)
source("index.R", local = TRUE)
source("index_global.R", local = TRUE)

# Plot polarity words
rmarkdown::render("terms.Rmd", quiet = TRUE)

# Plot polarity scores
rmarkdown::render("lss.Rmd", quiet = TRUE)

# Compare with manual coding
rmarkdown::render("validation/accuracy.Rmd", quiet = TRUE)

# Compare fulltext and summary 
rmarkdown::render("fulltext.Rmd", quiet = TRUE)

# Generate GTI plots
rmarkdown::render("index.Rmd", quiet = TRUE)

# Compare with other index
rmarkdown::render("comparison.Rmd", quiet = TRUE)

